(global-map [menu-bar mule]):

Conditionalize on default-enable-multibyte-characters.

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 8f0eac976632fd38320963d279ec35eca8b5bdf1..94a2b4f9d12419d16df7ae6fc84fcfd15bb1af28 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -50,7 +50,9 @@
 (defvar mule-menu-keymap (make-sparse-keymap "Mule")
   "Keymap for MULE (Multilingual environment) menu specific commands.")
 
-(define-key global-map [menu-bar mule] (cons "Mule" mule-menu-keymap))
+(define-key global-map [menu-bar mule]
+  `(menu-item "Mule" ,mule-menu-keymap
+             :visible default-enable-multibyte-characters))
 
 (setq menu-bar-final-items (cons 'mule menu-bar-final-items))